The Macintosh Demo: Applications/Apple-MacintoshDemoApplicationsCD-1.0-1992.iso/More Information/ClipMedia/ClipMedia™ Demo/ClipMedia™ Demo.rsrc/BITD_3118

AmigaBASIC Source Code | 1992-08-25 | 1.3 KB | 272 lines

                                           <0x85b8c860,0x02><0x1758d6d4><0x5c,0x08>4^4<0x7c>_<0x7c>THEN
^_\<0x5c,0x02><0x1758d6e6><0x5c,0x08>^4:<0x7c>_<0x7c>THEN
:X+<0x5c,0x02><0x1758d6f8><0x5c,0x08>4^4<0x7c>_<0x7c><0x7d>
=
4^+<0x7e>3<0x1758d70c>4334<0x5c,0x08>^4^<0x7c>^<0x7c>THEN
<0x1758d71b><0x5c,0x08>9+334<0x7e>3^5^<0x7c>
3X\<0x7e>3<0x1758d76a>^343<0xfa,0x08>__^:<0x7c>BASETHEN
2<0xfa,0x02>3+4434394<0xfa,0x01>^5^<0x7c>VASC<0x7c>NOT
3<0xfa,0x02>3\33^3X34<0xfa,0x01>_^_<0x7c>43<0x7c><0x7c>=
<0x7e><0xfa,0x02>33<0xfa,0x01><0x7d>_:33<0x7e><0x7c>/
<0x7d><0xfa,0x02>W434<0xfa,0x01>
<0xfa,0x01>_varfffffc3a<0x7d>3<0x7e><0x7c>OR
<0x1758d7d1><0xfa,0x08>3^^49X:3^5^_Y:X<0xfa,0x01>
:<0x7e>3<0x1758d7e9>:X3<0x7c><0x7c>\
<0x7e>

IMP<0x62><0xfa,0x02><0x7c><0x7c>MOD
<0x1758d7fc>IMPV334^4:X:X:_^<0xfa,0x08>&H5e3bX^4^4^443<0x7c><0x7c>\
0<0xfa,0x02>3X3:W4^4^X;X;X_^<0x7e>_<0x1758d832>^5^Y:_4^4^4]]<0xfa,0x08><0xfa,0x01>1IMP<0xfa,0x01>343^34^4^4^_^_^;<0x7d>                                                           ^_^4^^4^44943                                                                                                                                                                                                                                                            <0x85b8c860,0x02>0V\33]43^4^4^4^5^5^<0x7d>_1X__X;^Y:X:X:X3^33<0x7c><0x7c><0x7d>
var2bfa<0x7e>31315043^4^4^_^_^Y<0x7d>_
:<0x1758d918>_^Y:^4^4^34]4343<0x7c><0x7d>

<0xfa,0x02>3<0x1758d930>4]434^4^4^:Y:X;_^<0x7e>_<0x1758d944>Y^;^X;X:X:X434<0x7e>3<0x1758d955><0x7c><0x7c>

+<0x7c>3&H3433^3^4X:X^4_^<0x7d>_<0x1758d96d>;^__X;^X:X:X:3^3^<0x7e>3

V<0x7e>3<0x1758d988>43]434^4:X:<0x1758d994>_^Y:_X<0x7d>_15198_4^;X:X49X34<0x7e>3IMP
BASE3523^49X:X:X:_^__;<0x7d>_<0x1758d9c9>^                                                                                               X:X:X:W43:<0x7e>3<0x7c>
AS3"4]43X:X4^4^Y:Y^__^__X;^_X:X:X:34:W4  <0x7c>
ASC<0x7e>303343^3:X:X^:^_^;Y^<0x7d>_24372^;X^4^4^343W<0x7e>3labelfffffc00<0x31,0x04>               43]43^4X:X:X;X_^<0x7d>_5;X_:_X:^4^4X34]43933<0x7c>
ASC<0x7c>3<0x1758dafe>43^                                                                                              43<0x31,0x02><0x31,0x01>labelfffff9faAPPEND<0x31,0x04>3X:X:3^3var3334<0x7e>3labelfffffc00<0x31,0x04>334]43:X:3<0x31,0x01>\+\+\                                           \+\<0x7c>+<0x1758db97><0xf5,0x08>4^43449W<0x7e>3labelfffffc00ASC<0x7c>3<0x1758dbaa>43^3X:VASC^
X:W:W4<0x7d>3labelfffffc00APPEND3<0x1758dbc7>43]43:X3<0xf5,0x08>XOR
<0x7e>
2513^43^433:33<0xf5,0x03>
<0xf5,0x01>3<0x1758dbe9>43^43^VV^
:X349X<0x7e>3<0x1758dc00>ASCIMP

<0xf5,0x08>33^4^VV^
<0x1758dc14><0xf5,0x08>4^4:W4<0x7e>3varfffffbf5<0x7e>
varfffff856<0x7e>3<0x1758dc29>43^34^<0xf5,0x08><0x7e>
XOR
<0x1758dc36><0xf5,0x08>:X3:W4943<0xf5,0x01>

<0xf5,0x01>3<0x1758dc49>]43^4X<0xf5,0x08>^
<0x1758dc54><0xf5,0x08>:X:X3:3W<0xf5,0x01><0x7c>
<0x1758dc63>\<0xf5,0x08>343^43^V<0xf5,0x01>
<0x1758dc72>IMP<0xf5,0x08>^4494W4OUTPUT<0xf5,0x01>labelfffff8563<0x1758dc85>                                                   :X:\ASCAND
<0x1758dcb9>+<0x32,0x08>X:X3^3\TAB
<0x1758dcc7>SPC33^3X:3<0x32,0x08>OR
<0x1758dcd5>ASC<0x32,0x08>X:X94\<0x32,0x01>
<0x1758dce2>                                                   3:X4^3ASC+EQV
<0x1758dd1c>CHAIN34^43^\<0x7f,0x08>
MOD
<0x1758dd2b>\V^43^4^3ASC\MOD
<0x1758dd39>CHAIN3:X:X3V<0x7f,0x08>XOR
<0x1758dd47>IMPV+4^4^43<0x7f,0x08><0x7f,0x01><0x1758dd55>IMPVASC3_4^4+<0x7f,0x08>/
<0x1758dd63>+V<0x7f,0x08>^4^;\<0x7f,0x01><0x7f,0x01>\3_<0x1758dd74>:X33VIMP+
5\SPC3^Y^;3SPCSTEP\3Y^_                                                                                                                                                                                                                                                          VIMP'
<0x1758ddc6>IMP<0xf6,0x08><0xf6,0x01><0xf6,0x01>VUSR<0x62>
labelfffff5f7VASC<0xf6,0x04>V\+/